home *** CD-ROM | disk | FTP | other *** search
- * KERMIT - LOADS AND RUNS PE-KERMIT HOST PROGRAM
- * P#1 = DEBUG FLAG -- LOGS KERMIT SESSION TO KERMIT.LOG
- $JOB
- LO KERMIT/S
- AS 0,CON:;AS 1,CON:
- $IFX SYST:KERMIT.INI/S;AS 2,SYST:KERMIT.INI/S;$ENDC
- $IFX SYST:KERMIT.HLP/S;AS 14,SYST:KERMIT.HLP/S;$ENDC
- CLRTRM
- $W KERMIT LOADING> PLEASE WAIT ....
- XAL KERMIT.DIR,IN,20
- D F,-.-,KERMIT.DIR
- AS 3,KERMIT.DIR
- ENA TYPE
- PRE PROMPT
- PRE ETM
- $IFNNULL @1
- XAL KERMIT.LOG,IN
- LOG KERMIT.LOG
- $ENDC
- START
- $TERMJOB
- LOG
- XDE KERMIT.DIR
- PRE TYPE
- ENA PROMPT
- ENA ETM
- $EXIT
-